Hacks & Cracks/Hacks_and_Cracks.iso/programs/oscar 7.0/oscar.exe/0/RCDATA/TPTFRMOPENDLG/TPTFRMOPENDLG.txt

Text File | 1997-10-15 | 11KB | 369 lines

object PTFrmOpenDlg: TPTFrmOpenDlg
  Left = 304
  Top = 441
  ActiveControl = FileNameEdt
  BorderIcons = [biSystemMenu, biMaximize]
  AutoScroll = False
  Caption = 'Open'
  ClientHeight = 265
  ClientWidth = 451
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  ShowHint = True
  OnCloseQuery = FormCloseQuery
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object LookInTxt: TLabel
    Left = 8
    Top = 8
    Width = 38
    Height = 13
    Caption = 'Look &in:'
    FocusControl = PTShellCombo1
  end
  object UpOneLevelBtn: TSpeedButton
    Left = 304
    Top = 4
    Width = 23
    Height = 22
    Hint = 'Up One Level|Go to the folder one level up.'
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
      2222222222222222222200000000000000020FBFBFBFBFBFBF020BFBFBFBFBFB
      FB020FBFB000000FBF020BFBF0FBFBFBFB020FBFB0BFBFBFBF020BF00000FBFB
      FB020FBF000FBFBFBF020BFBF0FBFBFBFB020FBFBFBFBFBFBF02000000000000
      002220BFBFB02222222222000002222222222222222222222222}
    OnClick = UpOneLevelBtnClick
  end
  object ListBtn: TSpeedButton
    Tag = 2
    Left = 400
    Top = 4
    Width = 23
    Height = 22
    Hint = 'List|Displays items in a list.'
    GroupIndex = 1
    Down = True
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
      22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42
      00028F8288828F82888244222222442222228822222288222222222222222222
      2222222222222222222222222222222222222FFF22222FFF2222444222224442
      2222888F2FFF888F2FFF4F4200024F4200028F8288828F828882442222224422
      2222882222228822222222222222222222222222222222222222222222222222
      22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42
      00028F8288828F82888244222222442222228822222288222222222222222222
      2222222222222222222222222222222222222222222222222222}
    NumGlyphs = 2
    OnClick = ViewBtnClick
  end
  object DetailsBtn: TSpeedButton
    Tag = 3
    Left = 423
    Top = 4
    Width = 23
    Height = 22
    Hint = 'Details|Displays information about each item in the window.'
    GroupIndex = 1
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222FFFFFFFFFFFFFFF44444444444444448888888888888888222222222222
      22222222FFFF2FFF2FFF22200002000200022228888288828882222222222222
      2222222222222222222222222222222222222222222222222222}
    NumGlyphs = 2
    OnClick = ViewBtnClick
  end
  object CreateNewFolderBtn: TSpeedButton
    Left = 336
    Top = 4
    Width = 23
    Height = 22
    Hint = 'Create New Folder|Create a new folder here'
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333FFFFFFFFFFF3330000000000033333388888888888F3330BFBFBFBFB0
      33333383333333338F3330FBFBFBFBF033333383333333338F3330BFBFBFBFB0
      33333383333333338F3330FBFBFBFBF033033383333333338F3830BFBFBFBFB0
      30333383333333338F8F30FBFBFBFBF0033333833333333388F3300000000003
      3030338888888888338F330BFBF03303033333383333833838F3333000033030
      30333333888833838F8F33333333033333033333333338F33338333333333330
      33333333333333338F3333333333333333333333333333333333333333333330
      33333333333333338F3333333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = CreateNewFolderBtnClick
  end
  object ShowTreeBtn: TSpeedButton
    Left = 368
    Top = 4
    Width = 23
    Height = 23
    Hint = 'Show tree (F12)|Show the explorer tree.'
    AllowAllUp = True
    GroupIndex = 2
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333300033333333300030F03333333330333000333333333033333333
      00033330333300030F0333303333033300033330333333333333333033300033
      333333300030F033333333303330003333333333333333333333330003333333
      3333330F03333333333333000333333333333333333333333333}
    OnClick = ShowTreeBtnClick
  end
  object PTShellCombo1: TPTShellCombo
    Left = 72
    Top = 4
    Width = 221
    Height = 22
    HelpContext = 28456
    ShellList = PTShellList1
    Options = [ptscoAutofill]
    DropDownCount = 16
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 181
    Width = 451
    Height = 84
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 2
    object Label2: TLabel
      Left = 12
      Top = 10
      Width = 48
      Height = 13
      Caption = 'File &name:'
      FocusControl = FileNameEdt
    end
    object FilesOfTypeTxt: TLabel
      Left = 12
      Top = 38
      Width = 59
      Height = 13
      Caption = 'Files of &type:'
      FocusControl = FileTypesCbx
    end
    object FileNameEdt: TEdit
      Left = 88
      Top = 6
      Width = 277
      Height = 21
      TabOrder = 0
      OnChange = FileNameEdtChange
    end
    object FileNameCbx: TComboBox
      Left = 88
      Top = 6
      Width = 277
      Height = 21
      TabStop = False
      ItemHeight = 13
      TabOrder = 4
      Visible = False
    end
    object FileTypesCbx: TPTCombobox
      Left = 88
      Top = 34
      Width = 277
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
      OnSelEndOk = FileTypesCbxSelEndOk
    end
    object OpenBtn: TButton
      Left = 372
      Top = 4
      Width = 75
      Height = 23
      HelpContext = 28529
      Caption = '&Open'
      Default = True
      ModalResult = 1
      TabOrder = 2
    end
    object CancelBtn: TButton
      Left = 372
      Top = 32
      Width = 75
      Height = 23
      HelpContext = 28444
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 3
    end
    object ReadOnlyChk: TCheckBox
      Left = 88
      Top = 60
      Width = 233
      Height = 17
      Caption = 'Open as &read-only'
      TabOrder = 5
    end
    object HelpBtn: TButton
      Left = 372
      Top = 60
      Width = 75
      Height = 23
      Caption = '&Help'
      TabOrder = 6
      Visible = False
    end
  end
  object PTSplitter1: TPTSplitter
    Left = 4
    Top = 32
    Width = 441
    Height = 149
    Color = clBtnFace
    ParentColor = False
    Position = 200
    TabOrder = 1
    object TPTPane
      Left = 0
      Top = 0
      Width = 200
      Height = 149
      MinSize = 4
      Index = 0
      object PTShellTree1: TPTShellTree
        Left = 2
        Top = 2
        Width = 196
        Height = 145
        Options = [ptstoAutoFill, ptstoDefaultKeyHandling, ptstoContextMenus, ptstoDynamicRefresh]
        BorderStyle = bsNone
        ShowRoot = False
        HideSelection = False
        Indent = 19
        OnChange = PTShellTree1Change
        Align = alClient
        ParentColor = False
        TabOrder = 0
      end
    end
    object TPTPane
      Left = 203
      Top = 0
      Width = 238
      Height = 149
      MinSize = 60
      Index = 1
      object PTShellList1: TPTShellList
        Left = 2
        Top = 2
        Width = 234
        Height = 145
        HelpContext = 28549
        Options = [ptsloAutoFill, ptsloDefaultKeyHandling, ptsloContextMenus, ptsloDynamicRefresh]
        Align = alClient
        BorderStyle = bsNone
        ReadOnly = False
        HideSelection = False
        IconOptions.AutoArrange = True
        OnChange = PTShellList1Change
        PopupMenu = LvPopup
        TabOrder = 0
        ViewStyle = vsList
      end
    end
  end
  object LvPopup: TPopupMenu
    Left = 408
    Top = 44
    object View1: TMenuItem
      Caption = '&View'
      Hint = 'Contains commands for customizing this window.'
      object LargeIconsMitm1: TMenuItem
        Caption = 'Lar&ge icons'
        Enabled = False
        Hint = 'Displays items by using large icons.'
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object SmalliconsMItm1: TMenuItem
        Tag = 1
        Caption = 'S&mall icons'
        Enabled = False
        Hint = 'Displays items by using small icons.'
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object ListMitm1: TMenuItem
        Tag = 2
        Caption = '&List'
        Checked = True
        Hint = 'Displays items in a list.'
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object DetailsMitm1: TMenuItem
        Tag = 3
        Caption = '&Details'
        Hint = 'Displays information about each item in the window.'
        RadioItem = True
        OnClick = ViewBtnClick
      end
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object PasteMitm1: TMenuItem
      Caption = '&Paste'
      Hint =
        'Inserts the items you have copied or cut into the selected locat' +
        'ion.'
      OnClick = PasteMitm1Click
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object New1: TMenuItem
      Caption = 'Ne&w'
      Hint = 'Contains commands for creating new items.'
      object FolderMitm: TMenuItem
        Caption = '&Folder'
        Hint = 'Creates a new, empty folder.'
        OnClick = CreateNewFolderBtnClick
      end
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object PropertiesMitm: TMenuItem
      Caption = 'P&roperties'
      Hint = 'Displays properties for this folder.'
      OnClick = PropertiesMitmClick
    end
  end
end